home *** CD-ROM | disk | FTP | other *** search
/ CD Action 72 - Disc 2 / cdaction-72-2.iso / #dema / tux racer / tuxracer-win32-0.61a.exe / tuxracer-win32-0.61a / courses / common / foggy_light.tcl < prev    next >
Text File  |  2000-10-04  |  1KB  |  34 lines
  1. tux_course_light 0 -on -position { 1 1 1 0 } -diffuse { 0.45 0.43 0.47 1 } \
  2.      -specular { 0.3 0.3 0.3 1 } -ambient { 0.39 0.4 0.44 1.0 }
  3.  
  4. tux_course_light 1 -on -position { 1 1 2 0 } -specular { 0.5 0.5 0.5 1 } 
  5.  
  6. set fog_dist 40
  7. set far_clip [tux_get_param forward_clip_distance]
  8. if { $fog_dist > $far_clip } {
  9.     set fog_dist $far_clip
  10. } 
  11.  
  12. tux_fog -on -mode linear -start -10 -end $fog_dist -colour { 0.58 0.59 0.65 1.0 }
  13.  
  14. tux_particle_colour { 0.36 0.41 0.49 1.0 }
  15.   
  16.     
  17. tux_load_texture envmap ../common/envmap.rgb 0
  18. tux_bind_texture terrain_envmap envmap
  19.  
  20.  
  21. tux_load_texture alpine1-front ../common/cloudyfront.rgb 0
  22. tux_load_texture alpine1-right ../common/cloudyright.rgb 0
  23. tux_load_texture alpine1-left ../common/cloudyleft.rgb 0
  24. tux_load_texture alpine1-back ../common/cloudyback.rgb 0
  25. tux_load_texture alpine1-top ../common/cloudytop.rgb 0
  26. tux_load_texture alpine1-bottom ../common/cloudybottom.rgb 0
  27.  
  28. tux_bind_texture sky_front alpine1-front
  29. tux_bind_texture sky_right alpine1-right
  30. tux_bind_texture sky_left alpine1-left
  31. tux_bind_texture sky_back alpine1-back
  32. tux_bind_texture sky_top alpine1-top
  33. tux_bind_texture sky_bottom alpine1-bottom
  34.